home *** CD-ROM | disk | FTP | other *** search
- on(press){
- if(eval("/:var" add (clx + 1) add "_" add cly add "_color") == clc or eval("/:var" add (clx - 1) add "_" add cly add "_color") == clc or eval("/:var" add clx add "_" add (cly + 1) add "_color") == clc or eval("/:var" add clx add "_" add (cly - 1) add "_color") == clc)
- {
- single = 0;
- call("act");
- }
- else
- {
- single = 1;
- }
- }
-